﻿' LibWowArmory
' by Ronald M. Clifford (roncli@roncli.com)
'
' This source code is released under the GNU Library General Public License (LGPL) Version 2.1.

Imports System.Collections.Generic
Imports System.Xml.Serialization

Namespace roncliProductions.LibWowArmory.ItemInfoSchema

    Public Class cost

        Private intArena As Integer
        Private intBuyPrice As Integer
        Private intFactionId As Integer = -1 'Has to default to -1 because Faction ID can be 0 or empty
        Private intHonor As Integer
        Private intSellPrice As Integer
        Private tToken As New List(Of token)

        <XmlAttribute()> Public Property arena() As Integer
            Get
                Return intArena
            End Get
            Set(ByVal value As Integer)
                intArena = value
            End Set
        End Property

        <XmlAttribute()> Public Property buyPrice() As Integer
            Get
                Return intBuyPrice
            End Get
            Set(ByVal value As Integer)
                intBuyPrice = value
            End Set
        End Property

        <XmlAttribute()> Public Property factionId() As Integer
            Get
                Return intFactionId
            End Get
            Set(ByVal value As Integer)
                intFactionId = value
            End Set
        End Property

        <XmlAttribute()> Public Property honor() As Integer
            Get
                Return intHonor
            End Get
            Set(ByVal value As Integer)
                intHonor = value
            End Set
        End Property

        <XmlAttribute()> Public Property sellPrice() As Integer
            Get
                Return intSellPrice
            End Get
            Set(ByVal value As Integer)
                intSellPrice = value
            End Set
        End Property

        <XmlElement()> Public Property token() As List(Of token)
            Get
                Return tToken
            End Get
            Set(ByVal value As List(Of token))
                tToken = value
            End Set
        End Property

    End Class

End Namespace